package Legend.Colors is

   Red    : constant Color_Type := (R | A => 255, others => 0);
   Blue   : constant Color_Type := (B | A => 255, others => 0);
   Green  : constant Color_Type := (G | A => 255, others => 0);
   Yellow : constant Color_Type := (B => 0, others => 255);
   Purple : constant Color_Type := (G => 0, others => 255);
   Orange : constant Color_Type := (R | A => 255, G => 128, B => 0);
   White  : constant Color_Type := (others => 255);
   Black  : constant Color_Type := (A => 255, others => 0);
   Gray   : constant Color_Type := (A => 255, others => 128);

end Legend.Colors;
